home *** CD-ROM | disk | FTP | other *** search
/ Dr. Windows 3 / dr win3.zip / dr win3 / COMMUNIC / GC101B.ZIP / WEATHER.SCR < prev    next >
Text File  |  1993-07-30  |  2KB  |  58 lines
  1. ;
  2. ;***********************************************************************
  3. ;       WinCIS .94
  4. ;       Copyright(C) 1992
  5. ;       Larry Lee (76670,1471)
  6. ;       16038 Augusta Drive
  7. ;       Chino Hills, Ca 91709
  8. ;***********************************************************************
  9.  
  10. ; GO FULL SCREEN
  11. WINDOWSTATE MAXIMIZE
  12.  
  13. WAIT !
  14. SEND SET BRIEF YES^M
  15. WAIT !
  16. SEND SET PAGED NO^M
  17. WAIT !
  18. SEND SET BLANK YES^M
  19. WAIT !
  20. SEND GO CIS^M
  21. WAIT !
  22.  
  23. ; Erase Exitsing File if Any
  24. KILLFILE &MESSAGEPATH\WEATHER.TXT
  25.  
  26. ; ^M^J is the same as a CRLF
  27. ; Add a Title Line
  28. ; ^M^J is the same as a CRLF
  29. ; Add a Title 
  30. PUTFILE &MESSAGEPATH\WEATHER.TXT ^M^J
  31. PUTFILE &MESSAGEPATH\WEATHER.TXT *****************************************^M^J
  32. PUTFILE &MESSAGEPATH\WEATHER.TXT *     W E A T H E R    R E P O R T      *^M^J
  33. PUTFILE &MESSAGEPATH\WEATHER.TXT *****************************************^M^J
  34. PUTFILE &MESSAGEPATH\WEATHER.TXT * Date:    &Date^M^J 
  35. PUTFILE &MESSAGEPATH\WEATHER.TXT * Time:    &Time^M^J 
  36. PUTFILE &MESSAGEPATH\WEATHER.TXT * Name:    &UserName^M^J 
  37. PUTFILE &MESSAGEPATH\WEATHER.TXT * Account: &UserId^M^J 
  38. PUTFILE &MESSAGEPATH\WEATHER.TXT *****************************************^M^J
  39. PUTFILE &MESSAGEPATH\WEATHER.TXT ^M^J
  40.  
  41. ; Start File Capture
  42. CAPTURE &MESSAGEPATH\WEATHER.TXT APPEND
  43.  
  44. ; get local weather
  45. SEND WEATHER^M
  46. WAIT !
  47.  
  48. ; Turn Off File Capture
  49. CAPTURE OFF
  50.  
  51. ; Shrink the screen Size
  52. ; WINDOWSTATE MINIMIZE
  53. ; Call Notepad
  54. ; SHELL NOTEPAD.EXE 1 &MESSAGEPATH\WEATHER.TXT
  55.  
  56. ; Logoff CIS and Exit the Terminal Window
  57. LOGOFF
  58.